
function  [value] = binarray2dec(register)

[dimension,null] = size(register);

if null ~= 1
	dimension = null;
end
value = 0 ;

for j=1:dimension
	value = value + register(j) * 2^(j-1);
end
